• All Homeownership Incentive Distributions, 2016-2018
  • Neighborhood Analysis
• Homeownership Incentive Funding Distribution by Housing Market Typology Group, 2016-2018
• Household Income Distribution by Program

incen %>% 
  group_by(prog.type, hmt.group) %>%
  summarise(total = sum(as.numeric(amount))) %>%
  mutate(total = ifelse(is.na(total), 0, total)) %>%
  filter(!is.na(prog.type)) %>%
  ungroup() %>%
  group_by(prog.type) %>%
  mutate(pct = percent(total / sum(total))) %>%
  select(-total) %>%
  spread(key = prog.type, value = pct)

LS0tDQp0aXRsZTogIiINCmF1dGhvcjogIkp1c3RpbiBFbHN6YXN6LCBNYXlvcidzIE9mZmljZSBvZiBJbm5vdmF0aW9uIg0KZW1haWw6ICJqdXN0aW4uZWxzemFzekBiYWx0aW1vcmVjaXR5LmdvdiINCmRhdGU6ICJNb25kYXksIE1hcmNoIDI1LCAyMDE5Ig0Kb3V0cHV0Og0KICBodG1sX25vdGVib29rOg0KICAgIGNvZGVfZm9sZGluZzogaGlkZQ0KICAgIGZpZ19oZWlnaHQ6IDUNCiAgICBmaWdfd2lkdGg6IDEwDQogICAgdG9jOiB5ZXMNCiAgICB0b2NfZGVwdGg6IDINCi0tLQ0KDQpgYGB7ciBzZXR1cCwgaW5jbHVkZSA9IEZBTFNFLCBlY2hvID0gRkFMU0UsIG1lc3NhZ2UgPSBGQUxTRSwgY2FjaGUgPSBUUlVFfQ0Ka25pdHI6Om9wdHNfY2h1bmskc2V0KGVjaG8gPSBGQUxTRSwgd2FybmluZyA9IEYsIG1lc3NhZ2UgPSBGLCBpbmNsdWRlID0gVCwNCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGZpZy53aWR0aCA9IDEwLCBmaWcuaGVpZ2h0ID0gNSkNCmBgYA0KDQoNCmBgYHtyfQ0KbGlicmFyeShyZWFkeGwpDQpsaWJyYXJ5KGdnbWFwKQ0KbGlicmFyeShsZWFmbGV0KQ0KbGlicmFyeShodG1sdG9vbHMpDQpsaWJyYXJ5KFJTb2NyYXRhKQ0KbGlicmFyeShzaGlueSkNCnNvdXJjZSgiLi4vc3JjLzAwX2luaXRpYWxpemUuUiIpDQpgYGANCg0KYGBge3IgbG9hZC5kYXRhLCBjYWNoZSA9IFQsIHdhcm5pbmcgPSBGLCBlY2hvID0gRn0NCmluY2VuIDwtIHJlYWRfY3N2KCIuLi9kYXRhL3Byb2Nlc3NlZC9ob21lYnV5aW5nX2luY2VudGl2ZXMvaG9tZWJ1eWluZ19pbmNlbnRpdmVfcHJvZ3JhbXMuY3N2IiwgbmEgPSBjKCJOQSIpKQ0KDQpob29kcyA8LSBnZXRfbmVpZ2hib3Job29kX2JvdW5kYXJpZXMoKQ0KaG10LmJ5Lmhvb2QgPC0gcmVhZF9leGNlbCgiLi4vZGF0YS9yYXcvaG10L0hNVCBieSBOZWlnaGJvcmhvb2QgMjAxNy54bHN4IikgJT4lDQogIHRyYW5zbXV0ZShuZWlnaGJvcmhvb2QgPSBOZWlnaGJvcmhvb2QsDQogICAgICAgICAgICBwcmVkb21pbmFudC5jb2RlID0gYFByZWRvbWluYW50IENvZGUgSWdub3JpbmcgTm9uLVJlc2lkZW50aWFsYCkNCnNhbGVzIDwtIGxvYWRfc2FsZXNfZGF0YShsb2FkLmNhY2hlID0gVCkNCg0KcmVhbC5wcm9wLnVybCA8LSAiaHR0cHM6Ly9kYXRhLmJhbHRpbW9yZWNpdHkuZ292L3Jlc291cmNlLzZhY3QtcXp1eS5qc29uIg0KcmVhbC5wcm9wIDwtIHJlYWQuc29jcmF0YShyZWFsLnByb3AudXJsLCBhcHBfdG9rZW4gPSBWQVJTJFNPQ1JBVEFfVE9LRU4pDQpgYGANCg0KYGBge3J9DQpob29kc0BkYXRhIDwtIGhvb2RzQGRhdGEgJT4lIGxlZnRfam9pbihobXQuYnkuaG9vZCwgYnkgPSBjKCJsYWJlbCIgPSAibmVpZ2hib3Job29kIikpDQpgYGANCg0KYGBge3J9DQpobXQubGV2ZWxzIDwtIGMoImhlYWx0aHkiLCAidXBwZXIgbWlkZGxlIiwgImxvd2VyIG1pZGRsZSIsICJkaXN0cmVzc2VkIiwgIm90aGVyIikNCg0KaW5jZW4gPC0gaW5jZW4gJT4lIA0KICBtdXRhdGVfYXQoDQogICAgdmFycyhwcm9nLnR5cGUsIGhtdC5ncm91cCwgcHJlZG9taW5hbnQuY29kZSwgbGFiZWwsIGdlbmRlciwgcmFjZSwgZXRobmljaXR5KSwNCiAgICBmdW5zKGFzLmZhY3RvcikNCiAgKSAlPiUNCiAgbXV0YXRlKGhtdC5ncm91cCA9IGZjdF9yZWxldmVsKGhtdC5ncm91cCwgaG10LmxldmVscykpDQoNCmBgYA0KDQpgYGB7cn0NCnNhbGVzIDwtIHNhbGVzICU+JSByZW5hbWUoc2FsZXMuYmxvY2sgPSBCbG9jaywgc2FsZXMubG90ID0gTG90KQ0KcmVhbC5wcm9wIDwtIHJlYWwucHJvcCAlPiUgcmVuYW1lKHJlYWwuYmxvY2sgPSBibG9jaywgcmVhbC5sb3QgPSBsb3QpDQpgYGANCg0KYGBge3J9DQpyZWFsLnByb3AgPC0gcmVhbC5wcm9wICU+JQ0KICBtdXRhdGUocmVhbC5ibG9jay5jbGVhbiA9IGdzdWIoIl4wKyIsICIiLCByZWFsLmJsb2NrKSwNCiAgICAgICAgIHJlYWwubG90LmNsZWFuID0gZ3N1YigiXjArIiwgIiIsIHJlYWwubG90KSkNCg0Kc2FsZXMgPC0gc2FsZXMgJT4lDQogIG11dGF0ZShzYWxlcy5ibG9jay5jbGVhbiA9IGdzdWIoIl4wKyIsICIiLCBzYWxlcy5ibG9jayksDQogICAgICAgICBzYWxlcy5sb3QuY2xlYW4gPSBnc3ViKCJeMCsiLCAiIiwgc2FsZXMubG90KSkNCmBgYA0KDQpgYGB7cn0NCnNhbGVzIDwtIHNhbGVzICU+JQ0KICBsZWZ0X2pvaW4ocmVhbC5wcm9wLCANCiAgICAgICAgICAgIGJ5ID0gYygic2FsZXMuYmxvY2suY2xlYW4iID0gInJlYWwuYmxvY2suY2xlYW4iLA0KICAgICAgICAgICAgICAgICAgICJzYWxlcy5sb3QuY2xlYW4iID0gInJlYWwubG90LmNsZWFuIikNCiAgICAgICAgICAgICkNCmBgYA0KDQojIEFsbCBIb21lb3duZXJzaGlwIEluY2VudGl2ZSBEaXN0cmlidXRpb25zLCAyMDE2LTIwMTgNCg0KYGBge3Igb3V0LndpZHRoID0gIjEwMCUiLCBmaWcud2lkdGggPSA4fQ0KcGxvdC5jb2xvcnMgPC0gYyhpdGVhbS5jb2xvcnNbMV0sIGl0ZWFtLmNvbG9yc1s0XSwgaXRlYW0uY29sb3JzWzVdKQ0KDQoNCnBhbCA8LSBjb2xvckZhY3RvcihwbG90LmNvbG9ycywNCiAgICAgICAgICAgICAgICAgICBkb21haW4gPSBpbmNlbiRwcm9nLnR5cGUpDQoNCmhvb2RzLmxhYmVscyA8LSBwYXN0ZTAoDQogIGhvb2RzJGxhYmVsLA0KICAiPGJyPjIwMTcgSG91c2luZyBNYXJrZXQgVHlwb2xvZ3k6ICIsIGhvb2RzJHByZWRvbWluYW50LmNvZGUNCikNCg0KbGFiZWxzIDwtIHBhc3RlMCgNCiAgaW5jZW4kcHJvZy50eXBlLA0KICAiPGJyPiIsIGluY2VuJGhvdXNlLm51bSwgIiAiLCBpbmNlbiRzdHJlZXQsICIgIiwgaW5jZW4kc3RyZWV0LnR5cGUsDQogICI8YnI+QW1vdW50OiAkIiwgaW5jZW4kYW1vdW50DQogIA0KKQ0KDQpsZWFmbGV0KCkgJT4lDQogIHNldFZpZXcobG5nID0gLTc2LjYsIGxhdCA9IDM5LjMsIHpvb20gPSAxMSkgJT4lDQogIGFkZFByb3ZpZGVyVGlsZXMocHJvdmlkZXJzJFN0YW1lbi5Ub25lckxpdGUpICU+JSANCiAgYWRkUG9seWdvbnMoZGF0YSA9IGhvb2RzLA0KICAgICAgICAgICAgICBmaWxsT3BhY2l0eSA9IDAsDQogICAgICAgICAgICAgIGNvbG9yID0gImdyYXkxMCIsDQogICAgICAgICAgICAgIHdlaWdodCA9IDMsDQogICAgICAgICAgICAgIGxhYmVsID0gfmxhcHBseShob29kcy5sYWJlbHMsIEhUTUwpKSAlPiUNCiAgYWRkQ2lyY2xlTWFya2VycyhkYXRhID0gaW5jZW4sDQogICAgICAgICAgICAgICAgICAgcmFkaXVzID0gMSwNCiAgICAgICAgICAgICAgICAgICBjb2xvciA9IH5wYWwoaW5jZW4kcHJvZy50eXBlKSwNCiAgICAgICAgICAgICAgICAgICBsYWJlbCA9IH5sYXBwbHkobGFiZWxzLCBIVE1MKQ0KICApICU+JQ0KICBhZGRMZWdlbmQocG9zaXRpb24gPSAiYm90dG9tcmlnaHQiLA0KICAgICAgICAgICAgY29sb3JzID0gcGxvdC5jb2xvcnMsDQogICAgICAgICAgICBsYWJlbHMgPSBjKCJDREJHIiwgDQogICAgICAgICAgICAgICAgICAgICAgICJMTllXIiwgDQogICAgICAgICAgICAgICAgICAgICAgICJWMlYiKSwNCiAgICAgICAgICAgIG9wYWNpdHkgPSAxKQ0KDQpgYGANCg0KIyMgTmVpZ2hib3Job29kIEFuYWx5c2lzDQoNCg0KIyBIb21lb3duZXJzaGlwIEluY2VudGl2ZSBGdW5kaW5nIERpc3RyaWJ1dGlvbiBieSBIb3VzaW5nIE1hcmtldCBUeXBvbG9neSBHcm91cCwgMjAxNi0yMDE4DQoNCmBgYHtyIGVjaG8gPSBUfQ0KaW5jZW4gJT4lIA0KICBncm91cF9ieShwcm9nLnR5cGUsIGhtdC5ncm91cCkgJT4lDQogIHN1bW1hcmlzZSh0b3RhbCA9IHN1bShhcy5udW1lcmljKGFtb3VudCkpKSAlPiUNCiAgbXV0YXRlKHRvdGFsID0gaWZlbHNlKGlzLm5hKHRvdGFsKSwgMCwgdG90YWwpKSAlPiUNCiAgZmlsdGVyKCFpcy5uYShwcm9nLnR5cGUpKSAlPiUNCiAgdW5ncm91cCgpICU+JQ0KICBncm91cF9ieShwcm9nLnR5cGUpICU+JQ0KICBtdXRhdGUocGN0ID0gcGVyY2VudCh0b3RhbCAvIHN1bSh0b3RhbCkpKSAlPiUNCiAgc2VsZWN0KC10b3RhbCkgJT4lDQogIHNwcmVhZChrZXkgPSBwcm9nLnR5cGUsIHZhbHVlID0gcGN0KQ0KYGBgDQoNCg0KDQoNCmBgYHtyfQ0KaG9vZHNAZGF0YSA8LSBob29kc0BkYXRhICU+JQ0KICBsZWZ0X2pvaW4oDQogICAgaW5jZW4gJT4lIA0KICAgICAgY291bnQobGFiZWwsIHByb2cudHlwZSkgJT4lIA0KICAgICAgc3ByZWFkKGtleSA9IHByb2cudHlwZSwgdmFsdWUgPSBuKSwNCiAgICBieSA9IGMoImxhYmVsIiA9ICJsYWJlbCIpDQogICkgJT4lDQogIGxlZnRfam9pbigNCiAgICBzYWxlcyAlPiUgDQogICAgICBmaWx0ZXIoZGVlZC5kYXRlID49ICIyMDE2LTAxLTAxIikgJT4lIA0KICAgICAgY291bnQobmVpZ2hib3Job29kKSAlPiUNCiAgICAgIHJlbmFtZShzYWxlcy4xNl8xOCA9IG4pLA0KICAgIGJ5ID0gYygibGFiZWwiID0gIm5laWdoYm9yaG9vZCIpDQogICkNCmBgYA0KDQpgYGB7cn0NCmhvb2RzQGRhdGEgPC0gaG9vZHNAZGF0YSAlPiUNCiAgbXV0YXRlX2F0KA0KICAgIHZhcnMoQ0RCRywgTE5ZVywgVjJWLCBzYWxlcy4xNl8xOCksDQogICAgZnVucyhyZXBsYWNlKC4sIGlzLm5hKC4pLCAwKSkNCiAgKSAlPiUNCiAgbXV0YXRlKA0KICAgIGxueXcucGVyLjEwMHNhbGVzID0gMTAwICogTE5ZVyAvIHNhbGVzLjE2XzE4LA0KICAgIGNkYmcucGVyLjEwMHNhbGVzID0gMTAwICogQ0RCRyAvIHNhbGVzLjE2XzE4LA0KICAgIHYydi5wZXIuMTAwc2FsZXMgPSAxMDAgKiBWMlYgLyBzYWxlcy4xNl8xOA0KICApDQpgYGANCg0KDQpgYGB7ciBvdXQud2lkdGggPSAiMTAwJSIsIGZpZy53aWR0aCA9IDh9DQojdmFybmFtZSA8LSAibG55dy5wZXIuMTAwc2FsZXMiDQoNCnBhbCA8LSBjb2xvckJpbigiWWxPclJkIiwNCiAgICAgICAgICAgICAgICBkb21haW4gPSBjKDAsIDEwKSwNCiAgICAgICAgICAgICAgICBiaW5zID0gNykNCg0KaG9vZHMudmFyLmxhYmVscyA8LSBwYXN0ZTAoDQogIGhvb2RzJGxhYmVsLA0KICAiPGJyPjIwMTcgSG91c2luZyBNYXJrZXQgVHlwb2xvZ3k6ICIsIGhvb2RzJHByZWRvbWluYW50LmNvZGUsDQogICI8YnI+cGVyIDEwMCBzYWxlczogIiwgaG9vZHMkY2RiZy5wZXIuMTAwc2FsZXMNCikNCg0KbGVhZmxldCgpICU+JQ0KICBzZXRWaWV3KGxuZyA9IC03Ni42LCBsYXQgPSAzOS4zLCB6b29tID0gMTEpICU+JQ0KICBhZGRQcm92aWRlclRpbGVzKHByb3ZpZGVycyRTdGFtZW4uVG9uZXJMaXRlKSAlPiUNCiAgYWRkUG9seWdvbnMoZGF0YSA9IGhvb2RzLA0KICAgICAgICAgICAgICBmaWxsT3BhY2l0eSA9IC41LA0KICAgICAgICAgICAgICBmaWxsQ29sb3IgPSB+cGFsKGhvb2RzJGNkYmcucGVyLjEwMHNhbGVzKSwNCiAgICAgICAgICAgICAgY29sb3IgPSAiZ3JheTEwIiwNCiAgICAgICAgICAgICAgd2VpZ2h0ID0gMiwNCiAgICAgICAgICAgICAgbGFiZWwgPSB+bGFwcGx5KGhvb2RzLnZhci5sYWJlbHMsIEhUTUwpKQ0KDQoNCmBgYA0KDQoNCg0KDQoNCiMgSG91c2Vob2xkIEluY29tZSBEaXN0cmlidXRpb24gYnkgUHJvZ3JhbQ0KDQpgYGB7cn0NCmluY2VuICU+JQ0KICBnZ3Bsb3QoKSArDQogIGdlb21fZGVuc2l0eShhZXMoaG91c2Vob2xkLmluY29tZSwgY29sb3IgPSBwcm9nLnR5cGUpKSArDQogIHRoZW1lX2l0ZWFtX3ByZXNlbnRhdGlvbnMoKSArDQogIHhsaW0oYygwLCAzMDAwMDApKQ0KYGBgDQoNCmBgYHtyfQ0KDQoNCmBgYA0KDQoNCmBgYHtyfQ0Kc2FsZXMgJT4lIGZpbHRlcihkZWVkLmRhdGUgPj0gIjIwMTYtMDEtMDEiKSAlPiUgY291bnQobmVpZ2hib3Job29kKQ0KYGBgDQoNCg0KDQoNCg0K